	
;;; QQ: 67762207
[@main]
#IF
checkpkpoint 2
#SAY
With you nothing to say about such people. \ \
<Close/@exit>
#ELSESAY
My job is to train a monster and lease them to people. \ \
<Monster Rental/@RentMonster> \
<Purchase of the task props/@task class +> \
With (FCOLOR/10) <$NPCNAME> (FCOLOR/12) <dialogue/@TalkToQuest> \ \
<Close/@exit>

[@RentMonster]
# CALL [System\RentMobSystem.txt] @Event_taming

[@TalkToQuest]
#ACT
Mov D0 0

#IF
Check [209] 1
Check [409] 0

#SAY
<On the dialogue with today's tasks./@CALL_Npc_TodayQuest> \
#ACT
Mov D0 1

#IF
Check [101] 1
Check [301] 0
checkjob Warrior

#SAY
<On the task of dialogue./@CALL_Quest_4_1> \

#ACT
Mov D0 1

#IF
!Equal D0 1
#ACT
goto @NoQuest_Say
break

[@NoQuest_Say]
#SAY
_ Is the power to tame these guys, so if I do not see, over a period of time will be resistance. \ \
_ <Close/@exit>


[@CALL_Quest_4_1]
#CALL [AreaQuest\ChoBoGuide1\ChoBoGuide1_Warrior.txt] @Basic_Warrior_4_1


[@CALL_Npc_TodayQuest]
#CALL [TodayQuest\QT_NPCSetting.txt] @NPCSetDairyQuest


[@everythingreward]
#CALL [System\TotalRewardSystem.txt] @TotalRewardSystem

[@Task class +]
#SAY
(FCOLOR / 2)                          (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR / 1) item title (FCOLOR/12) (FCOLOR / 2)  (FCOLOR / 1) price (FCOLOR / 2)  (FCOLOR / 1) one can buy a (FCOLOR / 2 )  (FCOLOR/12) \
(FCOLOR / 2)                          (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) Daimon card [1000000] <buy/@goumaiyd (Daimon cards, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) remains [1000000] <buy/@goumaiyd (human remains, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) log [1000000] <buy/@goumaiyd (logbook, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) Holy Spirit brand [1000000] <buy/@goumaiyd (Holy Spirit brand, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) Holy Ghost Skeleton [1000000] <buy/@goumaiyd (Holy Spirit Skeleton, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) St. Shih Chi [1000000] <buy/@goumaiyd (St. Historical Records, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) Bard keepsake [1000000] <buy/@goumaiyd (Bard keepsake, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) King's Blade [1000000] <buy/@goumaiyd (King's Blade, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)  (FCOLOR/14) Bard Notes from [one million] <buy/@goumaiyd (Notes from Bard, 1000000)> (FCOLOR / 2)  (FCOLOR/12) \
(FCOLOR / 2)                          (FCOLOR/12) \ \
<Back/@main> \

[@goumaiyd ()]
#IF
#ACT
Mov A3% ARG (1);; items
Mov D3% ARG (2);; money
mov D4 1
MOV P1% D3
MOV P2% D4
MUL P1 P2
MOV D2% P9
#IF
checkgold% D2
#ACT
give% A3% D4
take coins% D2
#SAY
Buy the success! \
You spent (FCOLOR/10) <$OUTPUT(D2)> (FCOLOR/12) gold, buy (FCOLOR/10) <$OUTPUT(D4)> (FCOLOR/12) a (FCOLOR/10) <$OUTPUT(A3)> (FCOLOR/12). \ \
\
<Back/@main> \

# ELSESAY
You do not have (FCOLOR/10) <$OUTPUT(D2)> (FCOLOR/12) gold, I can not buy it for you (FCOLOR/10) <$OUTPUT(D4)> (FCOLOR/12) a (FCOLOR/10) <$OUTPUT(A3)> (FCOLOR/12). \ \
\
<Back/@main> \
;;; QQ: 67762207 